#ifndef _RTMP_MESSAGE_H_
#define _RTMP_MESSAGE_H_
#include "config.h"
#include "rtmp.h"
#include "amf.h"
#include "avcdescriptor.h"
#include "h265/HEVCDescriptor.h"
#include "aac/aacconfig.h"
#include "BufferWritter.h"
#include <vector>


template<class InputIt>
constexpr uint32_t FourCcToUint32(InputIt first)
{
	static_assert(sizeof(decltype(*first)) == 1);
	
	uint32_t result = 0;
	for (unsigned i = 0; i < sizeof(uint32_t); i++)
	{
		result = (result << 8) + uint8_t(*first++);
	}
	
	return result;
}


class RTMPMediaFrame 
{
public:
	enum Type {Audio=8,Video=9};
public:
	virtual ~RTMPMediaFrame() = default;
	virtual RTMPMediaFrame* Clone() = 0;

	Type  GetType()		{ return type;		}
	QWORD GetTimestamp()	{ return timestamp;	}
	void  SetTimestamp(QWORD timestamp) { this->timestamp = timestamp; }

	QWORD GetSenderTime() const { return senderTime; }
	void  SetSenderTime(QWORD senderTime) { this->senderTime = senderTime; }

	virtual DWORD Parse(BYTE *data,DWORD size);
	virtual DWORD Serialize(BYTE* buffer,DWORD size);
	virtual DWORD GetSize()	{ return buffer->GetSize() + 1; }

	virtual DWORD	GetMediaSize()			{ return buffer->GetSize();			}
	virtual DWORD	GetMaxMediaSize()		{ return buffer->GetCapacity();			}
	virtual void	SetMediaSize(DWORD mediaSize)	{ AdquireBuffer(); buffer->SetSize(mediaSize);	}

	
	const BYTE*	GetMediaData() const		{ return buffer->GetData();			}
	//BYTE*		GetMediaData()			{ AdquireBuffer(); return buffer->GetData();	}
	const Buffer::shared& GetBuffer() const		{ return buffer; }

	void DisableSharedBuffer() { disableSharedBuffer = true; }

	void ResetData(DWORD size = 0)
	{
		//Create new owned buffer
		buffer = std::make_shared<Buffer>(size);
		//Owned buffer
		ownedBuffer = true;
	}

	void Alloc(DWORD size)
	{
		//Adquire buffer
		AdquireBuffer();
		//Allocate mem
		buffer->Alloc(size);
	}

	void SetMedia(const BYTE* data, DWORD size)
	{
		//Adquire buffer
		AdquireBuffer();
		//Allocate mem
		buffer->SetData(data, size);
	}

	DWORD AppendMedia(const BYTE* data, DWORD size)
	{
		//Get current pos
		DWORD pos = buffer->GetSize();
		//Adquire buffer
		AdquireBuffer();
		//Append data
		buffer->AppendData(data, size);
		//Return previous pos
		return pos;
	}

	DWORD AppendMedia(BufferReader& reader, DWORD size)
	{
		//Get current pos
		DWORD pos = buffer->GetSize();
		//Adquire buffer
		AdquireBuffer();
		//Append data
		buffer->AppendData(reader.GetData(size), size);
		//Return previous pos
		return pos;
	}

	DWORD AppendMedia(const Buffer& append)
	{
		//Get current pos
		DWORD pos = buffer->GetSize();
		//Adquire buffer
		AdquireBuffer();
		//Append data
		buffer->AppendData(append.GetData(), append.GetSize());
		//Return previous pos
		return pos;
	}

	DWORD AppendMedia(BufferReader& reader)
	{
		return AppendMedia(reader, reader.GetLeft());
	}

	void PrependMedia(const BYTE* data, DWORD size)
	{
		//Store old buffer
		auto old = buffer;
		//New one
		buffer = std::make_shared<Buffer>(old->GetSize() + size);
		//We own the payload
		ownedBuffer = true;
		//Append data
		buffer->AppendData(data, size);
		//Append data
		buffer->AppendData(old->GetData(), old->GetSize());
	}

	void PrependMedia(const Buffer& buffer)
	{
		PrependMedia(buffer.GetData(), buffer.GetSize());
	}

	virtual void	Dump();

	static const char* GetTypeName(Type type)
	{
		switch (type)
		{
			case Audio:
				return "Audio";
			case Video:
				return "Video";
		}
		return "Unknown";
	}

protected:
	RTMPMediaFrame(Type type, QWORD timestamp, DWORD size);
	RTMPMediaFrame(Type type, QWORD timestamp, const Buffer::shared& buffer);

	bool AdquireBuffer()
	{
		if (!buffer) return false;
		
		//If already owning
		if (ownedBuffer)
			//Do nothing
			return true;

		//Clone payload
		buffer = std::make_shared<Buffer>(buffer->GetData(), buffer->GetSize());
		//We own the payload
		ownedBuffer = true;
		
		return true;
	}

	Type type;
	QWORD timestamp = 0;
	QWORD senderTime = 0;

	Buffer::shared	buffer;
	bool ownedBuffer = false;
	bool disableSharedBuffer = false;

	
};

class RTMPVideoFrame : public RTMPMediaFrame
{
public:
	enum VideoCodec {FLV1=2,SV=3,VP6=4,VP6A=5,SV2=6,AVC=7};
	enum FrameType  {INTRA=1,INTER=2,DISPOSABLE_INTER=3,GENERATED_KEY_FRAME=4,VIDEO_INFO=5};
	enum AVCType	{AVCHEADER = 0, AVCNALU = 1, AVCEND = 2 };
	enum PacketType {
		SequenceStart		= 0,
		CodedFrames		= 1,
		SequenceEnd		= 2,
		CodedFramesX		= 3,
		Metadata		= 4,
		MPEG2TSSequenceStart	= 5,
		MultiTrack		= 6
	};
	enum MultTrackType {
		OneTrack		= 0x00,
		ManyTracks		= 0x10,
		ManyTracksManyCodecs	= 0x20,
	};
	enum VideoCodecEx {
		H264	= FourCcToUint32("avc1"),
		AV1	= FourCcToUint32("av01"),
		VP9	= FourCcToUint32("vp09"),
		HEVC	= FourCcToUint32("hvc1"),
	};
public:
	RTMPVideoFrame(QWORD timestamp, DWORD size);
	RTMPVideoFrame(QWORD timestamp, const Buffer::shared& buffer);
	RTMPVideoFrame(QWORD timestamp, const AVCDescriptor &desc);
	virtual ~RTMPVideoFrame() = default;
	virtual RTMPMediaFrame* Clone();

	virtual DWORD	Parse(BYTE *data,DWORD size);
	virtual DWORD	Serialize(BYTE* buffer,DWORD size);
	virtual DWORD	GetSize();

	void		SetVideoCodec(VideoCodec codec)		{ this->codec = codec;		}
	void		SetFrameType(FrameType frameType)	{ this->frameType = frameType;	}
	VideoCodec	GetVideoCodec()	const			{ return codec;		}
	FrameType	GetFrameType() const			{ return frameType;	}
	BYTE		GetAVCType() const			{ return extraData[0];	}
	DWORD		GetAVCTS() const			{ return ((DWORD)extraData[1]) << 16 | ((DWORD)extraData[2]) << 8 | extraData[3]; }
	
	DWORD		SetVideoFrame(BYTE* data,DWORD size);
	void		SetAVCType(BYTE type)			{ extraData[0] = type;		}
	void		SetAVCTS(DWORD ts)			{ extraData[1] = ts >>16 ; extraData[2] = ts >>8 ;  extraData[3] = ts; }
	virtual void	Dump();
	
	bool		IsExtended() const			{ return isExtended; }
	VideoCodecEx	GetVideoCodecEx() const			{ return codecEx; }
	PacketType      GetPacketType() const			{ return packetType; }
	
	
	bool IsConfig() const
	{
		if (!isExtended)
		{
			return GetAVCType() == RTMPVideoFrame::AVCHEADER;
		}
		
		return GetPacketType() == RTMPVideoFrame::SequenceStart;
	}
	
	virtual bool IsCodedFrames() const
	{
		if (!isExtended)
		{
			return  GetAVCType() == RTMPVideoFrame::AVCNALU;
		}
		
		return GetPacketType() == RTMPVideoFrame::CodedFrames ||
			GetPacketType() == RTMPVideoFrame::CodedFramesX;
	}

	BYTE GetTrackId() const { return trackId; }
	
private:
	
	enum class ParsingState
	{
		VideoTagHeader,
		VideoTagHeaderFourCc,
		VideoTagAvcExtra,
		VideoTagBody,
		VideoTagHevcCompositionTime,
		VideoTagData,
		VideoTagHeaderMultiTrack,
		VideoTagHeaderTrackId,
	};

	bool		isExtended = false;
	bool		isMultiTrack = false;
	
	VideoCodec	codec = VideoCodec::AVC;
	VideoCodecEx	codecEx = VideoCodecEx::HEVC;
	
	FrameType	frameType = FrameType::INTER;
	PacketType	packetType = PacketType::SequenceStart;
	
	BYTE		extraData[4] = {};
	BYTE		fourCc[4] = {};
	BYTE		trackId	= 0;

	ParsingState parsingState = ParsingState::VideoTagHeader;
	
	std::unique_ptr<BufferWritter> bufferWritter;
};

class RTMPAudioFrame : public RTMPMediaFrame
{
public:
	enum AudioCodec		{PCM=0,ADPCM=1,MP3=2,PCMLE=3,NELLY16khz=4,NELLY8khz=5,NELLY=6,G711A=7,G711U=8,AAC=10,SPEEX=11,MP38khz=14};
	enum SoundRate		{RATE5khz=0,RATE11khz=1,RATE22khz=2,RATE44khz=3};
	enum AACPacketType	{AACSequenceHeader = 0, AACRaw = 1};
public:
	RTMPAudioFrame(QWORD timestamp, DWORD size);
	RTMPAudioFrame(QWORD timestamp, const Buffer::shared& buffer);
	RTMPAudioFrame(QWORD timestamp, const AACSpecificConfig &config);
	virtual ~RTMPAudioFrame() = default;
	virtual RTMPMediaFrame* Clone();

	virtual DWORD	Parse(BYTE *data,DWORD size);
	virtual DWORD	Serialize(BYTE* buffer,DWORD size);
	virtual DWORD	GetSize();

	AudioCodec	GetAudioCodec()	const		{ return codec;			}
	SoundRate	GetSoundRate()	const		{ return rate;			}
	bool		IsSamples18Bits() const		{ return sample16bits;		}
	bool		IsStereo() const		{ return stereo;		}
	void		SetAudioCodec(AudioCodec codec)	{ this->codec = codec;		}
	void		SetSoundRate(SoundRate rate)	{ this->rate = rate;		}
	void		SetSamples16Bits(bool sample16bits) { this->sample16bits = sample16bits; }
	void		SetStereo(bool stereo)		{ this->stereo = stereo;	}
	DWORD		SetAudioFrame(const BYTE* data,DWORD size);

	void		SetAACPacketType(AACPacketType type)	{ extraData[0] = type;	}
	AACPacketType   GetAACPacketType() const		{ return (AACPacketType) extraData[0]; }

	virtual void	Dump();
private:
	AudioCodec	codec = AudioCodec::AAC;
	SoundRate	rate = SoundRate::RATE44khz;
	bool		sample16bits = false;
	bool		stereo = false;
	DWORD		headerPos = 0;
	BYTE		extraData[1];
};

class RTMPCommandMessage
{
public:
	RTMPCommandMessage();
	RTMPCommandMessage(const wchar_t* name,QWORD transId,AMFData* params,AMFData *extra);
	RTMPCommandMessage(const wchar_t* name,QWORD transId,AMFData* params,const std::vector<AMFData*>& extra);
	virtual ~RTMPCommandMessage();

	virtual DWORD Parse(BYTE *data,DWORD size);
	DWORD Serialize(BYTE* buffer,DWORD size);
	DWORD GetSize();

	std::wstring 	GetName() const		{ return name->GetWString(); 	}
	std::string 	GetNameUTF8() const	{ return name->GetUTF8String();	}
	double		GetTransId() const	{ return transId->GetNumber(); 	}
	bool		HasName() const		{ return name;			}
	bool		HasTransId() const	{ return transId;		}
	bool		HasParams() const	{ return params; 		}
	AMFData*	GetParams()  		{ return params; 		}
	DWORD		GetExtraLength() const	{ return extra.size(); 		}
	AMFData*	GetExtra(DWORD i) 	{ return extra[i]; 		}
	const std::vector<AMFData*>& GetExtra() { return extra;			}
	void		Dump();
	RTMPCommandMessage* Clone() const;
	
private:
	AMFParser 	parser;
	AMFString* 	name;
	AMFNumber* 	transId;
	AMFData* 	params; 	//Could be an object or NULL
	std::vector<AMFData*> extra; 	//Variable length of extra parameters
};

class RTMPNetStatusEvent : public AMFObject
{
public:
	RTMPNetStatusEvent(const wchar_t* code,const wchar_t* level,const wchar_t* description)
	{
		AddProperty(L"level",level);
		AddProperty(L"code",code);
		AddProperty(L"description",description);
	};

	const std::wstring GetCode() 		{ return HasProperty(L"code") ? (std::wstring)GetProperty(L"code") : L"";		}
	const std::wstring GetLevel() 		{ return HasProperty(L"level") ? (std::wstring)GetProperty(L"level") : L"";		}
	const std::wstring GetDescription() 	{ return HasProperty(L"description") ? (std::wstring)GetProperty(L"description") : L"";	}
};

class RTMPMetaData
{
public:
	RTMPMetaData(QWORD timestamp);
	~RTMPMetaData();

	QWORD GetTimestamp()	{ return timestamp;	}
	void  SetTimestamp(QWORD timestamp) { this->timestamp = timestamp; }
	DWORD Parse(BYTE *data,DWORD size);
	DWORD Serialize(BYTE* buffer,DWORD size);
	DWORD GetSize();

	DWORD		GetParamsLength();
	AMFData*	GetParams(DWORD i);
	void		AddParam(AMFData* param);
	void		Dump();
	RTMPMetaData* 	Clone();

private:
	AMFParser 	parser;
	std::vector<AMFData*> params; //Variable length of parameters
	QWORD		timestamp;
};

class RTMPMessage
{
public:
	enum Type
	{
		SetChunkSize = 1,
		AbortMessage = 2,
		Acknowledgement = 3,
		UserControlMessage = 4,
		WindowAcknowledgementSize = 5,
		SetPeerBandwidth = 6,
		Command = 20,
		CommandAMF3 = 17,	
		Data = 18,
		DataAMF3 = 15,
		SharedObject = 16,
		SharedObjectAMF3 = 19,
		Audio = 8,
		Video = 9,
		Aggregate = 22
	};
	static const char* TypeToString(Type type)
	{
		//Depending on the type
		switch(type)
		{
			case SetChunkSize:
				 return "SetChunkSize";
			case AbortMessage:
				 return "AbortMessage";
			case Acknowledgement:
				 return "Acknowledgement";
			case UserControlMessage:
				 return "UserControlMessage";
			case WindowAcknowledgementSize:
				 return "WindowAcknowledgementSize";
			case SetPeerBandwidth:
				 return "SetPeerBandwidth";
			case Command:
				 return "Command";
			case CommandAMF3:
				 return "CommandAMF3";
			case Data:
				 return "Data";
			case DataAMF3:
				 return "DataAMF3";
			case SharedObject:
				 return "SharedObject";
			case SharedObjectAMF3:
				 return "SharedObjectAMF3";
			case Audio:
				 return "Audio";
			case Video:
				 return "Video";
			case Aggregate:
				 return "Aggregate";

		}
		return "Undefined";
	}
private:
	RTMPMessage();
public:
	RTMPMessage(DWORD streamId,QWORD timestamp,Type type,DWORD length);
	RTMPMessage(DWORD streamId,QWORD timestamp,Type type,RTMPObject* msg);
	RTMPMessage(DWORD streamId,QWORD timestamp,RTMPCommandMessage* cmd);
	RTMPMessage(DWORD streamId,QWORD timestamp,RTMPMediaFrame* media);
	RTMPMessage(DWORD streamId,QWORD timestamp,RTMPMetaData* meta);
	~RTMPMessage();
	
	DWORD Parse(BYTE* buffer,DWORD size);
	DWORD Serialize(BYTE *data,DWORD size);
	bool IsParsed();
	DWORD GetLeft();
	void Dump();

	bool IsControlProtocolMessage();
	bool IsCommandMessage();
	bool IsMedia();
	bool IsMetaData();
	bool IsSharedObject();

	RTMPObject* 		GetControlProtocolMessage()	{ return ctrl; 	}
	RTMPCommandMessage* 	GetCommandMessage()		{ return cmd; 	}
	RTMPMetaData* 		GetMetaData()			{ return meta;	}
	RTMPMediaFrame*		GetMediaFrame()			{ return media;	}

	DWORD	GetStreamId() 	{ return streamId; 	}
	Type	GetType()	{ return type; 		}
	DWORD	GetLength()	{ return length; 	}
	QWORD	GetTimestamp()	{ return timestamp; 	}	

private:
	RTMPObject* 		ctrl;
	RTMPCommandMessage* 	cmd;
	RTMPMetaData*		meta;
	RTMPMediaFrame*		media;

	//Header values
	DWORD 	streamId;
	Type	type;	
	DWORD 	length;
	QWORD 	timestamp;
	//Parsing variables
	bool skip = false;
	bool parsing = false;	
	DWORD pos = 0;
};




#endif
